home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 April: Mac OS SDK / Dev.CD Apr 00 SDK1.toast / Development Kits / Mac OS / Thread Manager / Sample Applications / 68k Examples / Single Intersection Threads / MApplication.p next >
Encoding:
Text File  |  1994-11-17  |  1.4 KB  |  50 lines  |  [TEXT/MPS ]
  1. {–––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––
  2.  
  3.     PROJECT:        Threads Traffic Simulation
  4.     
  5.     FILE:            TestSkel.p
  6.     
  7.     LANGUAGE:        MPW Pascal (version 3.2)
  8.         
  9.     DESCRIPTION:    The main entry point of the application.  The Initialization routines are
  10.                     called, the application is run, then cleanup is done.  Nuff said.
  11.         
  12.     AUTHOR(S):        William H. Knott
  13.                     Apple Computer
  14.                     Cupertino, CA  95014
  15.                     AppleLink : KNOTT
  16.     
  17.     VERSION(S):        1.0        13-Oct-91    WHK    Brand New Today.
  18.  
  19. –––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––}
  20.  
  21. PROGRAM TestSkel;
  22.  
  23. USES
  24.     MemTypes, QuickDraw, OSIntf, ToolIntf, PackIntf, Traps, 
  25.     
  26.     UApplication, UInitMgmt, UEventMgmt;
  27.  
  28. {$S Main}
  29. {––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––-––}
  30. {                                                                                      }
  31. {    TheApp                                                                              }
  32. {                                                                                      }
  33. {    The reason for moving this not performing this code in the applications main      }
  34. {    routine is the desire global variables.  Any that might need to be added could      }
  35. {    be done locally.                                                                  }
  36. {                                                                                      }
  37. {    October 13, 1991        Created by William Knott                                  }
  38. {                                                                                      }
  39. {––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––-––}
  40. PROCEDURE TheApp;
  41.     BEGIN
  42.         InitProgram;
  43.         RunApplication;
  44.         CleanUpOnExit;
  45.     END;
  46.  
  47. BEGIN
  48.     TheApp;
  49. END.
  50.